#!perl -p
@_=1..$_-1;$_.="@_"
